(Fbyte_code) <Btemp_output_buffer_setup>: Check the

arg is a string before extracting its data.

diff --git a/src/bytecode.c b/src/bytecode.c
index f2394556e2b42881bad72df32d0cfed66313693d..363dcdfaa82f96206fe90a235d5a491b87f6cadd 100644 (file)
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -888,6 +888,7 @@ If the third argument is incorrect, Emacs may crash.")
 
        case Btemp_output_buffer_setup:
          BEFORE_POTENTIAL_GC ();
+         CHECK_STRING (TOP, 0);
          temp_output_buffer_setup (XSTRING (TOP)->data);
          AFTER_POTENTIAL_GC ();
          TOP = Vstandard_output;